SET IconMess$Dir <Obey$Dir>
Wimpslot -min 12K -max 30K
RUN <IconMess$Dir>.!RunImage
